Magnetite 20 C 
Set MaxMeshNumber 1

ReadMesh 1 120nm_magnetite_mult.tec filetype = TECPLOT
ReadTecplotZone 120nm_magnetite_mult.tec 1

External Field Direction 0.01 0.01 1.01 
External Field Strength 0 mT 

CubicRotation 0 0.6154 -.7854 SD = 2
CubicRotation 0 0.6154 -.7854 SD = 3

Loop K1 -.05e6 -0.25e6 -0.10e6
SetSubDomain 2 K1  %K1
SetSubDomain 3 K1  %K1
ZoneName  K1 = %K1 <111> rotated to <100>

Minimize
WriteMagnetization 120nm_increase_K1_$K1$

ENDLOOP
end
